home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / storage / function / cdrom / seekts2.scr < prev    next >
Encoding:
Text File  |  1994-09-07  |  875 b   |  36 lines
  1. @thread SEEKTS2.LOG
  2. @NewAlias cd CDROM.GRA
  3. @IMPORT SYSINFO.TXT
  4. cd LOG $PROMPT="LOGGING SEEKTS2"
  5. cd LOG $PROMPT="LOGGING THREAD 1"
  6. cd set ADDRESSMODE=REDBOOK
  7. cd set TIMESTART=02:45:00
  8. cd set TIMESTOP=05:55:00
  9. cd CDROM_OPEN
  10. cd CDROM_SEEK
  11. cd CDROM_PLAYAUDIO
  12. cd response $PROMPT="PLAYING AUDIO FOR 60 SECONDS" $PAUSE=60
  13. cd CDROM_STOPAUDIO
  14. cd CDROM_CLOSE
  15. @flush cd
  16. *
  17. *
  18. *
  19. @thread SEEKTS2.LOG
  20. @NewAlias cd1 CDROM.GRA
  21. @IMPORT SYSINFO2.TXT
  22. cd1 LOG $PROMPT="LOGGING SEEKTS2"
  23. cd1 LOG $PROMPT="LOGGING THREAD 2"
  24. cd1 CDROM_OPEN
  25. cd1 response $PROMPT="WAITING FOR  15 SECONDS" $PAUSE=15
  26. cd1 response $PROMPT="QUERYING AUDIO DISK INFO" $PAUSE=1
  27. cd1 CDROM_QUERYAUDIODISKINFO
  28. cd1 response $PROMPT="QUERYING AUDIO STATUS INFO" $PAUSE=1
  29. cd1 CDROM_QUERYSTATUS
  30. cd1 response $PROMPT="QUERYING UPCC INFO" $PAUSE=1
  31. cd1 CDROM_QUERYUPCC
  32. cd1 CDROM_CLOSE
  33. @flush cd1
  34.  
  35.  
  36.